home *** CD-ROM | disk | FTP | other *** search
/ Codemasters Artwork Disc ECTS 2000 ( UK) / Codemasters - Artwork Disc ECTS 2000 (UK).bin / pc / main.dxr / 00085_swap sprite.ls < prev    next >
Encoding:
Text File  |  2000-01-01  |  446 b   |  19 lines
  1. on mouseEnter me
  2.   i = the currentSpriteNum
  3.   n = member(the member of sprite i).name
  4.   sprite(i).member = n & "L"
  5.   t = n & "t"
  6.   sprite(12).member = member(t, 2)
  7. end
  8.  
  9. on mouseLeave me
  10.   sprite(12).member = member("blank", 2)
  11.   i = the currentSpriteNum
  12.   n = member(the member of sprite i).name
  13.   X = the number of chars in n
  14.   if char X of n = "L" then
  15.     s = member(the member of sprite i).memberNum
  16.     sprite(i).member = s - 1
  17.   end if
  18. end
  19.